$dialog select title "Выключение прозрачности слоёв" text "Растровые<raster>|Снимки<image>|Вектора<vector>|2D Объекты<sprite>|Экземпляры 3D объектов<mesh>|Дороги<road>|Дома<house>|Трубы<pipe>|Примитивы<primitive>"
!ltype = select

!ifdef ltype

$layers !ltype alpha 1
!delete ltype

!endif
